From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 9 May 1993 23:18:30 +0000 (+0000)
Subject: (dabbrev-expand): Delete a search-forward call
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~96347
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=9b54f2680c29949a2fc5ac24150644ff449166bf;p=emacs.git

(dabbrev-expand): Delete a search-forward call
after the second replace-match.
---

diff --git a/lisp/dabbrev.el b/lisp/dabbrev.el
index 0798b764c2b..db5fcacd077 100644
--- a/lisp/dabbrev.el
+++ b/lisp/dabbrev.el
@@ -186,7 +186,9 @@ with the next possible expansion not yet tried."
 	;; case pattern.
 	(save-excursion
 	  (replace-match abbrev t 'literal))
-	(search-forward abbrev)
+;;; This used to be necessary, but no longer, 
+;;; because now point is preserved correctly above.
+;;;	(search-forward abbrev)
 	(replace-match (if do-case (downcase expansion) expansion)
 		       (not do-case)
 		       'literal))